Imports System.Data.Odbc

Public Module CnxBD

    Dim dsnkime As String

    'dsnkime = "Driver={IBM INFORMIX ODBC DRIVER};" & _
    '            "database=kimesoluciones;" & _
    '            "host=192.168.0.100;" & _
    '            "srvr=ol_kimesoluciones;serv=27744;" & _
    '            "pro=onsoctcp;uid= " & usuariokime & ";pwd= " & passwdkime & "; " & _
    '            "cloc=en_US.CP1252;dloc=en_US.819"

End Module
